home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / compuserve-file-archive / 11 Exotic Applications / TK6414.ZIP / SAMPLE.TXT < prev    next >
Encoding:
Text File  |  1996-01-06  |  694 b   |  24 lines
  1. Here's an example of a text file to use with TOK64. Use SAMPLE.BAT
  2. to process it. BTW, things don't have to be in particular columns.
  3.  
  4. start tok64 hi
  5.  1 poke 53280,0:poke 53281,0:poke 53272,23
  6.  2 print "{clear}{down*2}{green}Hi."
  7.  3 print:print "{down}{gray}Hit a key to end: "
  8.  4 get a$:if a$="" then 4
  9.  5 print:print "{down}Bye Now!"
  10. stop tok64
  11.  
  12. OK, here's another listing.
  13.  
  14. start tok64 hello
  15.  1 poke 53280,14:poke 53281,6:poke 53272,21
  16.  2 print "{clear}{down*2}{light blue}hello."
  17.  3 print:print "here's the value for {255} "; {pi}
  18.  4 print:print "{down}hit a key to exit: "
  19.  5 get a$:if a$="" then 5
  20.  6 print:print "{down}that's all!"
  21. stop tok64
  22.  
  23. Pretty simple, huh?
  24.